gusucode.com > 良精ASP微博管理系统 V1.0 > 良精ASP微博管理系统 V1.0\code\admin\DelContent.asp
<!--#include file="../Include/CheckLogin.asp"--> <!--#include file="../Include/liangconn.asp"--> <!--#include file="../Include/Function.asp"--> <% dim Result,Selectid Result=request.QueryString("Result") SelectID=request.Form("SelectID") select case Result case "Message" select case Trim(Request.Form("batch")) case "批量显示" if SelectID<>"" Then conn.execute "update liangjing_Feedback set ViewFlag = 1 where id in ("&SelectID&")" response.redirect request.servervariables("http_referer") case "批量失效" if SelectID<>"" Then conn.execute "update liangjing_Feedback set ViewFlag = 0 where id in ("&SelectID&")" response.redirect request.servervariables("http_referer") case "删除所选" if SelectID<>"" Then conn.execute "delete from liangjing_Feedback where id in ("&SelectID&")" response.redirect request.servervariables("http_referer") End Select case else end select %>